(force-mode-line-update): Doc fix.

diff --git a/lisp/subr.el b/lisp/subr.el
index 2b4a3eda1e2e606b59dffcd37c3bdec5287c6929..06e2e57c0e3cc88e7bfe15e58868ce4159b5fb04 100644 (file)
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -587,7 +587,7 @@ Optional argument PROMPT specifies a string to use to prompt the user."
 
 (defun force-mode-line-update (&optional all)
   "Force the mode-line of the current buffer to be redisplayed.
-With optional non-nil ALL then force then force redisplay of all mode-lines."
+With optional non-nil ALL, force redisplay of all mode-lines."
   (if all (save-excursion (set-buffer (other-buffer))))
   (set-buffer-modified-p (buffer-modified-p)))